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FOREWORD 

The  Defense  Communications  Engineering  Center  (DCEC) 
Technical  Notes  (TN’s)  are  published  to  inform  Interested 
members  of  the  defense  community  regarding  technical 
activities  of  the  Center,  completed  and  in  progress.  They 
are  intenaed  to  stimulate  thinking  and  encourage  information 
exchange;  but  they  do  not  represent  an  approved  position  or 
policy  of  DCEC,  and  should  not  be  used  as  authoritative 
guidance  for  related  planning  and/or  further  action. 

Comments  or  technical  Inquiries  concerning  this 
document  are  welcome,  and  should  be  directed  to: 

D1 rector 

Defense  Communications  Engineering  Center 
1860  Wlehle  Avenue 
Reston,  Virginia,  22090 


I 


>• 

I 


TABLE  OF  CONTENTS 


Page 


I.  INTRODUCTION  1 

II.  SOL-370  JOB  STEPS  2 

III.  COMPLETION  CODES  3 

IV.  ERROR  DUMPS  8 

V.  TRACING  FACILITIES  11 

1.  Transactions  Tracing  facilities  11 

2.  The  SNUMOC  Option  13 

3.  The  PL/1  CHECK  Option  14 

4.  the  SSOURCE  and  $LIST  Options  14 

VI.  INSTALLATION  PROCEDURES  IS 

1.  Systems  Datasets  15 

2.  Initial  Tests  16 

VII.  THE  TRANSLATOR  21 

VIII.  THE  COMPILER/LINK-EDITER  22 

IX.  THE  MODEL  EXECUTION  23 

X.  THE  STATISTICS  PROGRAM  24 

XI.  THE  PLOT  PROGRAM  25 

BIBLIOGRAPHY  28 


□ □ 


UNCLASSIFIED June  1978 

SECURITY  CLASSIFICATION  OF  THIS  FAOE  fWkon  Pale  EnlereQ 


REPORT  DOCUMENTATION  PAGE 

i.  report  number 


READ  INSTRUCTIONS 
BEFORE  COMPLETING  FORM 


1.  OOVT  ACCESSION  Noj  »•  RECIPIENT'S  CATALOO  NUMBER 


0 

M 


DCEC- TN-10-78 


i tisnb  fm  juawnsj 

j>9Ii-376  User’s  Guide 


S.  TYPE  OF  REPORT  • PERIOD  COVERED 


/ , Technical ^Note^  / 

».  PERFORMINB-ORO.  REPORT 


CS 


s.  PERFORMING  one.  REPORT  NUMBER 
I.  CONTRACT  OR  ORANT  NUMGERfe; 


7^^THONf») 

* Horst/Ulfers  I 


S.  PERFORMING  ORGANIZATION  NAME  AND  ADDRESS 

Defense  Communications  Engineering  Center 
Computer  Systems  Division,  R800 
1860  Wiehle  Ave. , Reston,  VA  22090 


<0.  PROGRAM  ELEMENT.  PROJECT,  TASK 
AREA  * WORK  UNIT  NUMBERS 


II.  CONTROLLING  OFFICE  NAME  AND  ADDRESS 

(Same  as  9) 


14.  MONITORING  AGENCY  NAME  S AOORESSfif  Sftaeanf  from  Controlling  OfflnJ 


N/A 

i ' J 

• 

\ i 

1 ' 

1 1 

...  - 

IS.  SECURITY  CLASS.  fef  Ill  I*  report; 

Unclassified 


1 ts«.  oecl assification/oowngrading 
SCHEDULE 


ML. 


16.  DISTRIBUTION  STATEMENT  (ot  thl • Report) 

A.  Approved  for  public  release;  distribution  unlimited. 


5 *7.  DISTRIBUTION  STATEMENT  (ol  Ml*  eketfect  Ml  lull  III  Slock  20,  II  different  freei  Report; 

N/A 


IB.  supplementary  notes 

Review  relevance  5 years  from  submission  date. 

IS.  KEY  WORDS  fContlmie  on  rere.ee  tide  If  neceeeerr  and  Identify  k T Meek  nuetker; 

SOL-370  Language 

SOL-370  System 

System  Execution 

System  Inetallatlon 

Error  Tracing 

SO.  ABSTRACT  fCentlnvo  an  rereree  aid*  If  neceeearr  and  Identify  ky  Meek  meeker; 

This  .Technical  dfote  provides  information  for  the  user  of 
and  execute  the  SOL-370  System,  and  how  to  use  the  error 

SOL-370  to  Install 
tracing  facilities. 

— 3 


DO  I jSTtS  1473  COITION  OF  I NOV  IS  OBSOLETE 


Li  0-1  SL  f 


UNCLASSIFIED 


security  classification  of  this  raoe 


I.  INTRODUCTION 


This  Technical  Note  Is  a companion  document  to  the 
SOL-370  Language  Reference  Manual,  DCEC  Technical  Note  11-78 
and  contains  Information  for  the  user  to  Install  and  execute 


the  SOL-370  System, 
facll itles. 

and 

how 

to 

use  the 

error 

tracing 

All  four  job 

steps 

of 

the 

SOL-370 

System 

can  be 

executed  Individually  or  In  one  batch  run  with  four  job 
steps.  Some  job  steps,  particularly  the  Statistics  and 
Plotting  Routines,  can  be  run  very  efficiently  In  the 
foreground  using  the  Interactive  mode.  A separate  document, 
TN  16-78,  "SOL -370  TSO  User's  Guide,"  describes  the 
facilities  available  for  executing  the  system  from  a TSO 
terminal . 


II.  SOL-370  JOB  STEPS 


The  SOL-370  Simulation  System  consists  ot  four  distinct 
job  steps: 

Translate,  Compile,  Execute,  and  Analyze. 

Figure  1 Illustrates  the  information  flow  through  the 
system.  The  Translator  converts  the  SOL-370  source  language 
deck  to  PL/I.  Tne  PL/1  code  generated  Is  compatible  with  the 
PL/l-F,  PL/1 -OPT , and  the  PL/1  CHECK-OUT  Compiler,  and  Is 
merged  with  the  SOL-370  Library  during  compilation.  The 
resultant  load  module  should  be  saved  If  more  executions 
of  the  same  model  are  planned.  In  this  case  It  would  be 
saved  In  partitioned  data  set  SOL. LOAD.  The  Execution 
step  of  the  model  will  typically  write  data  into  two  files 
which  are  allocated  to  partltoned  data  sets  SOL . NAMES  and 
SOL. LOG.  These  two  data  sets  should  be  saved  until  all 
subsequent  analysis  runs  have  been  performed. 
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Figure  1. 

Information  Flow 

III.  COMPLETION  CODES 


One  of  the  following  completion  codes  Is  produced  at 
the  completion  of  each  simulation  run.  Any  code  other  than 
0000  Indicates  a run-time  error.  The  error  may  be  caused  by 
a user  mistake  or  systems  malfunctioning.  In  the  case  of  a 
user  abend  code,  the  error  Is  contained  In  the  SOb  source 
code  and  the  user  should  carefully  check  the  code.  In  the 
case  of  a system  abend  code,  the  user  should  obtain  a 
listing  of  the  SOL  source  code,  a complete  compile  listing 
(compile  the  model  with  OPTION(OFFSET) ) , and  tne  error  dump 
automatical ly  produced  when  an  error  has  occurred,  and 
submit  those  listings  to  SOL  Systems  Malntalnance  for 
analysis.  A summary  table  of  completion  codes  Is  provided 
In  Table  I.  Subsequently  each  completion  code  Is  explained 
In  more  detail . 

TABLE  I.  SUMMARY  TABLE  OF  SOL  COMPLETION  CODES. 


Compl . 
Code 

Error 

Type 

Related 

Statement 

Error  Condition 

SoTiO 

user 

STOP 

Successful  completion,  No  error 

0001 

system 

RELEASE 

No  transaction  In  facility  queue 

0010 

system 

DEMAND 

Preempted  transaction  not  found 

0011 

user 

ENTER 

Requested  amount  too  large 

0100 

user 

YIELD 

Bad  trunk  name, 

or  not  previously  demanded, 

or  amount  yielded  too  large 

0101 

user 

RELEASE 

Bad  faci 1 i ty  name , 
or  not  previously  seized 

0110 

user 

No  more  active  transactions 

1000 

system 

DEMAND 

Preempted  transaction  not  found 

In  $WU  and  SINFO  arrays 

1001 

system 

LEAVE 

Bad  store  name, 

or  not  previously  entered, 

or  amount  returned  too  large 

1010 

user 

NEW 

TRANSAC- 
TION TO 

Transaction  overflow, 

T In  process  declarations 
selected  too  small 

1011 

system 

SUPOATE 

Transaction  seized  facility  twice 

1101 

user 

SEIZE 

ENTER 

DEMAND 

Resource  overflow, 

R In  process  declaration 
selected  too  small 

1110 

user 

DISTRI- 

BUTION 

Distribution  function  has 
too  many  arguments 

mi 

system 

PARTI 

PL/1  system  error  message 

r- 


System  Error  Code:  0001 


Related  SOL  statement:  RELEASE 


Error  condition 


A transaction  releases  a facility 
when  other  transactions  are  queued 
up  to  seize  the  same  facility.  The 
facility  queue  does  not  contain  a 
transaction  waiting  on  this 
facility,  however. 


User  Action 


- Save  SOL  error  dump  and  notify 
Systems  of  error  condition. 


Error  flagged  In: 


Procedure  RELEAS 

locations:  50011240  & 50011290, 


System  Error  Code:  GolO 


Related  SOL  statement:  DEMAND 

Error  condition  - This  error  condition  Is  raised  when  a 

transaction  holding  a trunk  Is  preempted 
and  the  system  cannot  find  the  preempted 
transaction  In  the  trunk  queue. 

User  Action  - Save  SOL  error  dump  and  notify  Systems  of 

condition. 

Error  flagged  In:  Procedure  SCONTROL,  locations  50002280. 


User  Error  Code:  0011 
Related  SOL  statement:  ENTER 

Error  condition  - The  amount  of  storage  requested  in  an 

enter  statement  exceeds  the  declared 
capacity  of  this  store. 

User  Action  - Check  store  name  and  capacity  value  In 

the  enter  statement.  If  ok,  Increase 
the  value  In  the  declaration  for  this 
store  or  change  the  amount  requested  In 
the  corresponding  enter  statement. 

Error  Flagged  In:  Procedure  ENTER,  location  50020110. 
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User  Error  Cooe:  Olul 
Related  SOL  statement:  RELEASE 

Error  conaition  - The  transaction  executing  the  release 

statement  has  not  previously  seized  the 
facility  It  Is  trying  to  release  now. 

User  Action  - Check  for  bad  facility  name  used  In  the 

release  statement. 

Error  Flagged  in:  Procedure  RELEAS 

Location  50010920. 


User  Error  Code:  0110 


Related  SOL  statement:  RELEASE 

Error  condition  - The  timing  routine  of  the  simulator  tries 

to  find  a transaction  in  queue  to  be 
scheduled  for  execution.  However  the 
queue  Is  empty.  This  situation  may  occur, 
when  the  model  simply  runs  out  of 
transactions  because  of  slow  generation 
rate,  or  transactions  encounter 
unrealistic  wait  conditions. 

User  Action  - ho  action  needed.  Insert  STOP  statement  In 

model  source  code. 

Error  Flagged  In:  Procedure  RELEAS 

Location  50010920. 
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System  Error  Code:  1000 

SSSSSSSSSS5SSSSSSSSSSSS 

Related  SOL  statements:  DEMAND,  YIELD 

Error  condition  - A transaction  has  been  preempted  on  a 

trunk.  However,  an  entry  for  the 
transaction  cannot  be  found  In  the  $WU- 
and  SWUINFO-  arrays. 


User  Action 


- Save  error  dump  and  notify  Systems  of 
error  condition. 


Error  Flagged  in:  Procedure  DEMAND, 

Locations  50032670,  50032750 

Procedure  YIELD,  Location  50033510 
Procedure  SDMEMTY, 

Locations  50031780,  50031860. 


User  Error  Code:  1001 
Related  SOL  statement:  LEAVE 

Error  condition  - Tne  transaction  executing  the  leave 

statement  tries  to  return  capacity  to  a 
store  it  has  not  previously  usea,  or  it 
tries  to  return  more  capacity  units  than 
it  has  taken. 


Check  for  bad  store  name  or  capacity  in 
the  leave  statement. 


User  Action 

Error  Flagged  in:  Procedure  LEAVE,  Location  50020770. 


User  Error  Code:  1010 

sssssssssssssssssssss 

Related  SOL  statement:  NEW  TRANSACTION  TO 

Error  condition  - The  execution  of  the  NEW  TRANSACTION  TO 

statement  creates  a new  transaction. 
This  error  condition  is  raised  when 
active  transactions  in  the  model  exceed 
the  number  of  transactions  declared  in 
the  process  declaration  ( T = ? ) . 


User  Action 


Increase  the  value  for  T in 
declaration. 


the  process 


Error  Flagged  in:  Procedure  SNEWTRN, 

Location  50007460,  50007490 
Procedure  SLINKIN,  LOCATION  50005940 


User  Error  Code:  1011 

Related  SOL  statements:  SEIZE,  ENTER 

Error  condition  - The  same  transaction  attempts  to  seize 

the  same  facility  before  releasing  It. 

User  Action  - Check  model  for  logical  error  leading  to 

this  error  condition. 

Error  Flagqed  in:  Procedure  {UPDATE, 

Location  50006740,  50001100. 


User  Error  Code:  1101 

Related  SOL  statements:  SEIZE,  ENTER,  DEMAND 

Error  condition  - A transaction  tries  to  use  more  resources 

(facilities,  stores,  or  trunks)  than  were 
specified  in  the  process  statement. 

User  Action  - Increase  the  value  for  the  R parameter  in 

the  process  statement  of  the  process  where 
the  error  occurred. 

Error  Flagged  in:  Procedure  {UPDATE,  LOCATION  50U06950 

Procedure  DEMAND,  LOCATION  500328900 
Procedure  SDMEMTY,  LOCATION  50032000. 


User  Error  Code:  1110 
Related  SOL  statement:  DISTRIBUTION 


Error  condition  - This  error  condition  is  raised  when  the 

distribution  function  contains  more  than 
100  arguments. 


User  Action 


- Correct  distribution  statement. 


Error  Flagged  in:  Procedure  SDISTR,  LOCATION  50009480. 


System  Error  Code:  1111 

sssassssrssssssssssssss 

Related  SOL  statement:  anywhere 


Error  condition  - 


User  Action 


This  error  condition  is  raised  whenever 
one  of  the  PL/1  run-time  error  conditions 
is  detected.  An  additional  message  with 
the  corresponding  PL/1  abena  code  is 
pri nted. 


- Follow  IBM  instructions  to  correct  error. 


IV.  ERROR  DUMPS 


The  Error  Dump  facility  has  been  designed  primarily 
for  systems  maintenance.  For  the  experienced  user,  however, 
It  provides  a powerful  tool  in  the  debugging  and 

verification  process  of  a model.  This  section  explains  the 
output  produced  in  an  error  dump  listing. 

An  error  dump  listing  is  always  produced  whenever  a 
a SOL  completion  code  other  than  '0000'  Is  produced. 
Consecutive  error  dumps  may  also  be  programmed  for  as  part 
of  the  error  tracing  facilities  as  described  in  chapter  V. 
An  error  dump  listing  contains  the  current  value  of  all 
global  variables,  facilities,  stores,  and  trunks,  as  well  as 
some  of  the  important  internal  variables  and  the  queue 
arrays  with  associated  pointers.  Figure  2 shows  a sample 
listing  which  is  discussed  in  the  following  paragraph. 

The  number  at  the  end  of  the  first  line  of  the  listing 
corresponds  to  the  SOL  statement  number  where  the  error 
occurrea  . 

The  headline  'CURRENT  VALUES  OF  GLOBALLY  DECLARED 
ITEMS'  is  followed  by  a listing  of  all  facilities,  stores, 
trunks,  and  global  integers  with  their  current  values. 

The  next  segment  of  the  listing  lists  values  of  all 
parameters  of  the  transaction  that  caused  the  error. 

PROCESS  - for  the  process  number, 

IDENTFIR  - for  the  internal  tranaction  identifier, 
RE-ENTRY  - for  the  last  reentry  label  pointer  set, 
PRIORITY  - for  the  priority  level, 

UPDATPTR  - for  the  last  entry  in  the  SACTIVE.RES  array, 
INTERUPT  - for  the  preemption  return  label. 

The  next  segment  contains  the  unchanged  variables  of 
the  transaction  at  the  point  when  it  was  reactivated.  They 
are  listed  in  the  order  in  which  they  were  declared. 

The  following  listing  of  the  transactions  resource  words 
contains  information  on  all  resources  the  transaction  is 
currently  using. 

TYPE  - for  resource  type  { f ac 1 1 i ty=0 , store=l , trunk=3 ) , 
STRENGTH  - for  the  holding  strength  applied, 

LINK-INX  - for  the  sequence  number  of  the  resource, 

INDEX  - for  the  subscript, if  resource  is  subscripted, 

SWU  PNTR  - for  the  row  pointer  to  the  SWU  array, 

AMT  - for  the  amount  used  on  a store  or  trunk. 

The  LOCAL  VARIABLE  listing  contains  the  latest  updates 
of  the  local  variables  of  the  transaction. 
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The  SFACLNK,  $STRLNK,  $TRKLNK  arrays  contain  the 
pointers  to  the  $QUE  array  for  transactions  queued  up  on 
facilities,  stores,  and  trunks.  Each  pointer  has  two 
values,  the  first  one  containing  the  last  queue  location 
entered  and  the  second  pointing  to  the  bottom  entry  of  the 
queue  (lowest  value).  Empty  pointers  are  represented  by 

zero  entries. 

\ 

The  GLBLNK  ARRAY  listing  contains  the  entry  points  uo 
transaction  queues  caused  by  'WAIT  UNTIL*  conditions. 

The  PARAMETER  LIST  contains  the  current  values  of  the 
most  Important  Internal  simulation  parameters: 

SQMAX  - the  highest  location  of  $QUE  array  used, 

$NXTQ  - pointer  to  the  next  location  in  queue, 

SQEMTY  - pointer  to  the  lowest  empty  queue  location, 
STIMLNK  - pointer  pair  to  the  next  transaction  to  be 
reactivated  (time  queue). 

JTIME  - current  clock  time, 

JERRFLG  - current  value  of  the  error  flag. 

The  SLNKOAR  ARRAY  and  SLNKIAR  ARRAY  listings  contain 
the  values  of  the  transactions  last  linkeQ  in  or  out  of  the 
$QUE  array. 

The  listing  of  the  $QUE  ARRAY  consists  of  the  listing 
of  four  subarrays:  $QUE1,  $QUE2,  $QUE3,  and  SQUE4. 

$QUE1  - contains  the  link  key, 

SQUE2  - contains  the  transaction  identifier, 

$QUE3  - contains  special  time  values  if 

INTERRUPT  =WAIT  is  specified  or  transactions 
are  preempted  on  trunks, 

$QUE4  - contains  the  pointer  to  the  next  queue  entry. 

The  5WUINF0  ARRAY  contains  pointers  to  the  $WU  ARRAY 
grouped  by  holding  strength  and  overflow  rows.  There  are  two 
entries  for  each  column  (three  entries)  in  the  $WU  ARRAY: 
the  first  entry  Is  the  pointer  to  the  highest  entry  in  the 
corresponding  SWU  ARRAY  row;  the  second  value  Is  the  pointer 
to  the  overflow  row  (0  If  there  Is  none). 

The  SININF  ARRAY  contains  Information  on  preempted 
transactions  which  are  awaiting  action. 

The  $WU  ARRAY  contains  Information  about  transactions 
that  have  demanded  trunks.  There  are  15  columns  with  three 
entries  each:  the  subscript,  the  amount,  and  the 

transaction  Identifier.  Columns  1 through  8 correspond  to 
the  holding  strengths  0 through  7.  Columns  8 through  15  are 
overflow  rows  which  are  assigned  dynamically. 
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Figure  2.  Error  Dump  Sample  Listing 


V.  TRACING  FACILITIES 


To  verify  the  logic  of  a model  or  to  associate  error 
messages  with  line  numbers  In  the  SOL  or  PL/1  source  code, 
the  SOL-370  System  provides  the  following  tracing 
facilities. 


1.  TRANSACTION  TRACING  FACILITIES 

In  debugging  the  model.  It  may  become  neccessary  to 
trace  the  flow  of  a number  of  transactions  through  the 
model.  The  SOL-370  system  provides  a special  tracing 
facility  to  accomplish  this.  This  tracing  facility  provides 
for  a trace  of  up  to  15  transactions  and  can  be  activated  at 
a specific  time  during  simulation.  It  can  also  be 
deactivated  at  a specific  time.. 

The  tracing  facility  must  be  invoked  at  translation 
time  by  specifying  the  following  comment  card  ahead  of  the 
program: 


/*  $TRACE  */ 

Then  the  SOL  source  code  must  be  renumbered  starting  with  10 
and  subsequently  Incremented  by  10.  The  following  actions 
will  then  take  place: 

a.  During  translation,  the  translator  will  generate  a 
trace  call  at  all  labels  and  at  all  transfer  points  to  the 
control  module.  At  these  transfer  points  transactions  are 
usually  linked  into  one  of  the  queue  tables  and  a new 
transaction  Is  activated.  Also,  the  preprocessor  statement 
Is  generated  to  Include  the  librarian  module 
SOLINC(TRACE ) and  the  associated  GET  statement  to 
read  the  trace  parameters. 

b.  At  compile  time  the  trace  module  is  patched  Into  the 
program.  The  trace  module  must  be  contained  in  the  SOL 
library  dataset  allocated  to  file  SOLINC  with  the  member 
name  of  TRACE. 

c.  During  execution  of  the  model,  the  program  will  read 
first  the  19  parameter  values  for  the  trace  routine.  These 
parameters  must  be  the  first  19  values  In  the  dataset 
allocated  to  file  CARD  (default  allocation  Is 
'SOL.DATA(GOIN) ' ).  The  significance  of  the  values  read  Is  as 
fol 1 ows : 

First  value:  Simulation  clock  time  at  which 

the  Error  Dump  is  activated. 
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Second 


value:  Simulation  clock  time  at  which 

the  Error  Dump  facility  Is  to 
be  deactivated. 

Third  value:  Simulation  clock  time  at  which 

the  trace  Is  to  be  Invoked. 


Fourth  value:  Simulation  clock  time  at  which 

the  trace  Is  to  be 
deactl vated. 


5th  -19th  value:  Transaction  Identification 

numbers  of  the  15  transactions 
to  be  traced.  There  must  be 
15  values  or  commas.  The 
transactions  are  numbered  In 
order  of  arrival,  starting 
with  one  transaction  each  at 
each  process.  Process  one 
will  be  activated  first.  When 
a transaction  has  been 
cancelled,  its  number  will  be 
reassigned  to  the  next 
transaction. 


The  trace  printout  is  placed  Into  the  print  dataset 
allocated  to  print  file  PRINTER.  A sample  of  the  resulting 
trace  follows: 


I 


**********  TRANSACTION  IDENTIFICATION  NO  ********* 


IME 

1 

2 

3 

4 

0 

50* 

0 

70* 

0 

70 

90* 

0 

70 

120* 

0 

80* 

120 

67 

70* 

120 

67 

70 

120 

90* 

67 

70 

120 

120* 

101 

80* 

120 

120 

101 

60* 

12  0 

120 

101 

70 

120 

120 

90* 

101 

70 

120 

120 

120* 

117 

70 

130* 

120 

120 

117 

70 

150* 

120 

120 

129 

70 

* 

120 

120 

137 

70 

120 

130* 

145 

70 

120 

150* 

156 

70 

90* 

120 

150 

171 

70 

120 

120 

* 
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Each  transaction  traced  is  entered  Into  the  above 
table  when  it  executes  a statement  that  puts  it  Into  a 
queue  state.  This  entry  is  annotated  with  an 
asterisk.  The  leftmost  entry  on  the  same  row  represents 
the  simulation  clock  time  when  this  entry  was  made. 
All  entries  of  transactions  In  a queue  state  are  repeated 
without  asterisks  when  the  trace  of  a different  transaction 
is  recorded. 

For  better  efficiency,  the  model  should  be  recompiled 
without  the  trace  facility  when  the  model  has  been  debugged. 

Sometimes,  it  becomes  desirable  to  produce  error  dumps 
Independent  of  the  transactions  that  are  traced.  This  can 
be  accomplished  by  setting  the  identifier  of  the  first 
transaction  to  be  traced  ( 5th  value  ) to  zero.  An  error 
dump  will  then  be  produced  each  time  any  transaction  is 
entered  into  a queue  or  a label  is  encountered. 


2.  THE  JiNUMOC  OPTION. 

The  SNUMOC  option  of  the  SOL  translator,  when  enabled 
at  translation  time,  numbers  the  lines  of  the  generated  PL/1 
code  in  a fashion  that  allows  easy  cross-reference  between 
the  generated  PLI  code  ana  the  original  SOL  source  code  tne 
model  was  cooed  in.  This  feature  becomes  important  when  the 
user  wants  to  relate  the  IBM  run-time  error  messages,  which 
are  annotatea  with  the  line  number  of  the  PL/1  code,  to 
the  corresponai ng  SOL  source  statement. 

To  invoke  the  numbering  option,  the  SOL  source  code  of 
the  model  must  be  preceaed  by  a comment  card  of  the 
following  format: 

/*  SNUMOC  */ 

The  source  deck  must  then  be  renumbered  starting  with  10  for 
the  comment  card  and  in  subsequent  Increments  of  10.  Each 
line  of  the  generated  PL/1  code  is  then  numbered  according 
to  the  following  code: 


ABBBB8CCC 

The  first  digit  'A'  Identifies  the  program  module. 
Only  modules  1 or  3 are  generated  from  the  SOL  model  code. 
The  others  correspond  to  the  SOL  library  modules.  The 
second  through  sixth  digits  ' BBBBB ' correspond  directly  to 
the  line  number  of  the  SOL  source  code. 
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THE  PL/1  CHECK  OPTION 


The  IBM-provided  CHECK  condition  offers  a tool  for  a 
very  detailed  trace  of  variables  and  labels.  To  enable  this 
option  the  user  may  specify  the  translator  option  (CHECK  In 
the  comment  card  preceding  the  model  source  code.  The 
translator  will  then  generate  ahead  of  the  PL/1  code  the 
following  preprocessor  statement: 

^INCLUDE  SOL  INC ( CHECK  ) ; 

Alternatively,  the  user  may  choose  to  Insert  this 
statement  Into  the  PL/1  deck  directly.  A load  module 
compiled  with  this  option  will  produce  a trace  of  all 
Important  SOL  variables  and  labels.  Every  time  a variable 
assumes  a new  value,  the  new  value  and  the  associated 
statement  number  are  printed.  These  listings  may  become 
very  long  ana  therefore  this  feature  should  only  be  used  In 
extreme  cases.  In  conjunction  with  the  regular  SOL  error 
dump,  which  Is  automatically  produced  when  an  error  occurs, 
this  feature  gives  the  experienced  SOL  systems  programmer  a 
very  effective  tool  to  trace  a systems  error. 

4.  THE  (SOURCE  AND  (LIST  OPTIONS 

To  invoke  the  (SOURCE  or  the  (LIST  option  the  first 
card  of  the  source  deck  must  be  a comment  card  and  must 
contain  the  option  specified: 

/*  (SOURCE  (LIST  *1 

When  the  (SOURCE  option  Is  specified  the  translator  will 
list  each  source  card  when  read.  The  (LIST  option  causes 
the  translator  to  produce  a listing  of  the  PL/1  code 
generated.  Both  options  are  helpful  when  debugging  the 
source  code  of  a model . 
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VI.  INSTALLATION  PROCEDURES 


1.  SYSTEMS  DATASETS 


The  systems  tape  contains  two  partitioned  datasets  : 

SYS2.S0LLIB 
SYS2. SOLCMDP 


The  first  file 
1 ibrary  modules  as 

SOLTRAN 
SOLSTAT 
SOLPLOT 
CHECK 
PARTI 
PART2 
PART3 
PART4 
PART5 
TRACE 


"SYS2 . SOLL IB* 
foil ows : 


contains  all  PL/1  source 


The  Translator  Module 

The  Statistical  Post-Analysis  Module 

The  Plotting  Routine  Module 

Check  Statement  for  Error  Tracing 

Common  Declarations 

Control  Module  and  Common  Procedures 

Facility  Procedures 

Store  Procedures 

Trunk  Procedures 

Trace  Procedure 


The  second  file  contains  the  command  procedures,  which 
allow  the  user  to  Invoke  the  steps  of  the  SOL-370  System 
Individually  or  In  combination.  These  procedures  will  either 
generate  the  proper  JCL  for  background  submission  through 
the  RJE  command  or  Invoke  the  system  for  foreground 
execution. 

The  systems  tape  can  be  read  with  the  following  JCL 

code: 


//GETTAPE  JOB  (MYID.R820) , 'MYJOB.U.MYNAME' ,MSGLEVEL*(1,1), 

//  N0TIFY=R1111,MSGCLASS=Q,CLASS=A 

/♦SETUP  JOB  REQUIRES  TAPE  SER  NO  MYTAPE  FOR  INPUT  ******** 
//COPYPDS  EXEC  PGM=IEHMOVE 
//SYSPRINT  00  SYS0UT*(A,U) 

//SYSUT1  DU  UNIT*3330,DISP*0LD,V0L*SER*DISK01 
//0D1  DO  UNIT*3330,UISP=0LD,V0L*SER*DISK02 

//Tl  DD  DISP*(0L0,KEEP),UNIT*TAPE9, 

//  DCB* (LRECL*80 , bLKS I ZE=80Q , RECFM*FB ) .VOL-SER -MYTAPE, 

//  LABEL* ( ,NL) 

//SYS IN  DD  * 

COPY  PDS*S YS2 . SOLL I B , FR0M*T APE 9“ ( MYT APE , 1 ) , T0*3330*D ISK01 , C 

FR0MDD-T1.CATLG 

COPY  PDS-SYS2. SOLCMDP, FR0M*TAPE9»( MYT APE, 2 ) ,T0«3330«DISK01 , C 

FR0MDD-T1.CATLG 

/* 
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Before  the  SOL-370  System  can  be  operated,  three  load 
modules  must  be  compiled  and  placed  Into  the  data  set  named 
1 S YS2 . SOLLOAD ' . The  PL/1  source  code  of  the  programs  to  be 


compl 1 ed 
members : 

Is  contained  In  the  data 

set 

1 SYS2 . SOLL IB ' as 

SOLTRAN 

SOLSTAT 

SOLPLOT 

The 

source  code  of  these  programs 

Is 

compatible  with 

all  versions  of  the  PL/l-F  or  PL/l-OPT  compilers.  For  best 
run-time  efficiency,  the  Optimizing  compiler  should  be  used 
with  compile  option  OPT ( 2 ) . 

2.  INITIAL  TESTS 

To  test  the  Installed  system,  the  following  model  with 
JCL  has  been  provided.  The  SOL  source  code  of  this  model  Is 
also  stored  as  member  SOLTEST  In  dataset  SYS2.S0LCMDP. 
Identical  results  of  simulation  output  and  of  the  analysis 
step  must  be  obtained  for  the  system  to  be  operational. 


//R1591TSO  JOB  (DG44,  ,R830, 600, 10,250,  ,) .ULFERS, 

//  MSGLEVELX(1,1),N0TIFY=R1591,MSGCLASSXQ 

//TRAN  EXEC  PGM=SOLTRAN, REGI 0N=180K 
/ /TRAN . STEPL IB  DD  DSN=SYS2. SOLLOAD, DISP=S HR 
//SYSPRINT  DD  SYS0UTx(A,U) 

//TSOOUT  DD  SYS0UTx(A,U),DCBx(LRECLx131,BLKSIZEx131,RECFMxF) 
//0UTF1  OD  UhIT=SYSuA,SPACE*(TRK,(5,5)), 

//  DCBx(LRECLx80,BLKSIZEx880,RECFMxFB) 

//SOLTRAN  DD  DSN=&&SOLTRAN,DISP=( MOD , PASS ) , UN ITxS YSDA , 

//  SPACEx(400,(60,60)),DCBx(BLKSIZEx400,LRECLx8Q,RECFMxFB) 

//SYSIN  DD  * 

/*  TEST  OF  SOL-370  SYSTEM  SNUMOC  {TRACE  */ 

INTEGER  TRKFLG.OLDID, I DFLG , FLAG , CUM( 2 ) ; 

FACILITY  TERMINAL (2  ) ; 

STORE  50  STORAGE ( 2 ) ; 

TRUNK  50  BUFFER (2  ) ; 

PROCESS  CONTROL, Txl,Rx0; 

FLAG1 .FLAG 2 .FLAG 3 « 0; 

CUMX  0; 

TIMER: 

FLAG  x TIME; 

WAIT  1000; 

IF  TIME  < 4000  THEN  GO  TO  TIMER; 

STOP; 

CANCEL; 

END; 
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PROCESS  LOAD,T-15,R*3; 

INTEGER  ID, TERM; 

10*0; 

OLD I D=1 1 ; 

INTERRUPT*PREEMPT ; 

START: 

ID*ID+1 ; 

NEW  TRANSACTION  TO  LOAO; 

WAIT  10; 

IF  ID<11  THEN  GO  TO  START; 

CANCEL; 

LOAO: 

TERM*M0D(ID,2)+1; 

PRI0RITY»(10-ID)/2; 

SEIZE  TERMINAL(TERM) .PRIORITY; 

WAIT  100; 

RELEASE  TERMINAL(TERM); 

WAIT  5’ 

IF  10=1  THEN  DO; 

SEIZE  TERMINAL(1 ) ,15; 

WAIT  5; 

RELEASE  TERMINAL(l); 

END; 

IF  ID*10  THEN  DO; 

IF  TIME=615  THEN 

PUT  EUIT{ 'FACILITY  QUEUE  PRIORITIES  PROPERLY  PROCESSED' ) (A)  SKIP; 
ELSE  PUT  EDIT( 'FACILITY  QUEUE  PRIORITY  HANOLING  FAULTY' HA)  SKIP; 
END; 

WAIT  UNTIL  FLAG  >=  1000; 

IDFLG=ID-OLDID; 

OLDID=ID; 

IF  10*2  THEN  DO; 

IF  TIME=1U00  t,  IDFLG*1  THEN 

PUT  EDIT ( 'WAIT-UNTIL  QUEUE  PRIORITY  PROPERLY  PROCESSED' )( A)  SKIP; 
ELSE  PUT  EDIT( 'WAIT-UNTIL  PRIORITY  HANDLING  FAULTY. )(A)  SKIP; 
END; 

WAIT  ID*10; 

IF  ID*9  THEN  DU; 

IF  TIME=1090  THEN 

PUT  EDIT ( 'TIME  QUE  PROPERLY  PROCESSED' )(A)  SKIP; 

ELSE  PUT  EDIT ( 'TIME  QUEUE  PROCESSING  FAULTY * )(A)  SKIP; 

END; 

ENTER  STORAGE (TERM), 20; 

WAIT  100; 

LEAVE  STORAGE (TERM), 20; 

IF  10*5  THEN  DO; 

IF  TIME*1330  & STORAGE (2 )«50  THEN 

PUT  EDIT( 'STORE  QUEUE  PRIORITIES  PROPERLY  PROCESSED' )( A)  SKIP; 
ELSE  PUT  EDIT ( 'STORE  QUEUE  PRIORITY  HANDLING  FAULTY...' ) (A)  SKIP; 
END; 

WAIT  UNTIL  FLAG>*2U00; 

IF  10-3  THEN  DO; 

ENTER  STORAGE (2) ,10; 

END; 

WAIT  ID*10: 

INTERRUPT-INTER; 
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TRKLOAD: 

DEMAND  BUFFER(TERM) ,20, PRIORITY, PRIORITY; 

IF  ID-3  THEN  DEMAND  BUFFER(TERM) ,10, PRIORITY, PRIORITY; 

WAIT  100; 

IF  ID-3  THEN  DO; 

YIELD  BUFFER (TERM), 30, PRIORITY; 

END; 

ELSE  DO; 

YIELD  BUFFER(TERM), 20, PRIORITY; 

END; 

IF  10*1  THEN  DO; 

IF  TIME=2110  THEN  DO; 

PUT  EDIT( 'TRUNK  QUEUE  PRIORITIES  PROPERLY  PROCESSED' ) (A)  SKIP; 
WAIT  5; 

DEMAND  BUFFER(1),50,7,7; 

WAIT  15; 

YIELD  BUFFER (1 ) ,50,7; 

END; 

ELSE  DO; 

PUT  EOIT( 'TRUNK  QUEUE  PRIORITY  HANDLING  FAULTY. .' )(A)  SKIP; 
END; 

END; 

IF  ID-11  THEN  DO; 

IF  TIME-2330  THEN 

PUT  EDIT! 'TRUNK  PROCEDURES  PROPERLY  EXECUTED' )(A)  SKIP; 

ELSE  PUT  EDIT ( 'TRUNK  PROCESSING  FAULTY ' ){A)  SKIP; 

END; 

WAIT  UNTIL  FLAG  >=  30U0; 

WAIT  ID*10, 

INTERRUPT  = TRKINT ; 

IF  ID  > 9 THEN  DO; 

IF  ID  = 10  THEN  DO; 

WAIT  10; 

SEIZE  TERM INAL (TERM), 7; 

DEMAND  BUFFER (TERM) ,50,7,7; 

END; 

IF  ID  - 11  THEN  DO; 

DEMAND  BUFFER (TERM), 50, 7, 7; 

SEIZE  TERMINAL (TERM), 7; 

END; 

END; 

ELSE  DU; 

IF  ID  * 1 THEN  DO; 

SEIZE  TERMINAL (1), PRIORITY; 

END; 

DEMAND  BUFFER (TERM) ,10, PRIORITY, PRIORITY; 

END; 

WAIT  100; 

IF  ID-10  THEN  DO; 

IF  CUM(l)-4  A CUM(2)=5  THEN 

PUT  EDIT( 'MIXED  TRUNK. FACIL  PREEMPTION  PROPERLY  DONE')(A)  SKIP; 
ELSE  PUT  EDIT( 'CONCURNT  TRUNK/FACIL  PREEMPTION  FAULTY' )(A)  SKIP; 
END; 

CANCEL; 
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INTER: 

IF  ID-4  & TIME-2115  THEN  TRKFLG-1 ; 

IF  ID*2  & TIME-2115  THEN  TRKFLG-TRKFLG+1 ; 

IF  TRKFLG-2  & ID-2  THEN 

PUT  EDIT ( 'TRUNKS  PROPERLY  PREEMPTED' )( A)  SKIP; 

ELSE  IF  ID"*4  THEN 

PUT  EDIT( 'TRUNK  PREEMPTION  FAULTY *)(A)  SKIP; 

WAIT  5* 

GO  TO  TRKLOAD; 

PREEMPT: 

IF  10=24  TIME*105  THEN 

PUT  EDIT( 'FACILITY  PROPERLY  PREEMPTED’ )( A)  SKIP; 

ELSE  IF  -(ID-4  & TIME=110)  THEN 

PUT  EDIT(  'FACILITY  PREEMPTION  FAULTY ')  (A)  SKIP; 

WAIT  5; 

GO  TO  LOAD; 

TRKINT: 

CUM(TERM)*CUM(TERM)+1 ; 

CANCEL; 

END; 

END; 

/* 

//  EXEC  PL1LFCLG,TIME*5, 

//  P ARM . PL 1L  * ’ M , NOATR , NS , NS2 , EXTOI C , OPT =0 , NOSTMT ' , 

//  REGI0N.G0=300K 

//PL1L.SYSPRINT  DD  SYSOUT-(A.U) 

//PL1L.S0LINC  DD  DSN=S YS2 . SOLL I B , D I SP=SHR 
//PL1L.SYSIN  DD  OSN-MSOLTRAN , D I SP* ( OLD , DELETE ) 
//LKED.SYSLMOD  DD  DSN=R1591.S0L.L0AD(S0LTEST) , 

II  DCB* (DSORG-PO , LRECL-1 3030, BLKS IZE-13030 , RECFM-U ) , 

/ / SPACE- ( C YL , ( 1 , 1 , 10 ) ) , UN IT-3330 , DISP- ( MOD , CATLG ) 

//LKED.SYSPRINT  DD  SYSOUT=(A,U) 

//G0.SYSUT1  DD  DSN=R1591.S0L.L0AD(S0LTEST) .DISP-SHR 
//GO.SYSPRINT  DO  SYSOUT-(A.U) 

//GO.SYSIN  DD  SPACE- (TRK,( 1,1)), UN IT-SYSDA 
//NAMEFIL  DD  UNIT-3330, DSN-R1591. SOL. NAMES (SOLTEST), 

//  DCB* (DSORG-PO, LRECL-63, BLKSIZE-630, RECFM-FB ) , 

//  DISP-(MOO,CATLG),SPACE*(TRK,( 1,2,5)) 

//SLOGF  DD  UNIT-3330, DSN-R1591. SOL. LOG(SOLTEST) , 

//  DCB- (DSORG-PO , LRECL-46S , BLKS IZE-465 , RECFM-F ) , 

//  DISP-(MOO, CATLG), SPACE-(TRK, (10,10, 5)) 

//CARD  DD  * 

10000,10000,10000,10000,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15, 

I* 

//PRINTER  DO  SYSOUT-(A.U) 

//DISK  DD  SYSOUT-(A,U) 

// STAT  EXEC  PGM-S0LSTAT.REGI0N-200K 
//STAT.STEPLI8  DO  DSN-SYS2. SOLLOAD, DISP-SHR 
//SYSPRINT  DD  SYSOUT-(A.U) 
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//SYS IN  DD  * 

NO 

0, 

NO 

NO 

10000000, 

/* 

//LOO  DD  DSN=R1591.S0L.L0G(S0LTEST) ,DISP=SHR 
//NAMME  DD  DSN=R 1591 . SOL . NAMES ( SOLTEST ), D I SP =SHR 
/* 


During  execution  of  the  model  SOLTEST  the  following 
output  should  be  produced  Indicating  proper  functioning 
of  the  SOL-370  Simulation  System: 

FACILITY  PROPERLY  PREEMPTED 

FACILITY  QUEUE  PRIORITIES  PROPERLY  PROCESSED 

WAIT-UNT I L QUEUE  PRIORITIES  PROPERLY  PROCESSED 

TIME  QUE  PROPERLY  PROCESSED 

STORE  QUEUE  PRIORITIES  PROPERLY  PROCESSED 

TRUNK  QUEUE  PRIORITIES  PROPERLY  PROCESSED 

TRUNKS  PROPERLY  PREEMPTED 

TRUNK  PROCEDURES  PROPERLY  EXECUTEO 

COMBINED  TRUNK. FACIL  PREEMPTION  PROPERLY  DONE 

ENDED  AT  4000  WITH  COMPL.CODE  0000  1 3 


The  statistics  step  should  print  the  following  report 
If  the  system  Is  working  correctly: 


SNAPSHOT 

TIME  IS 

10000000 

NAME  OF  FACILITY 

TIME 

FRACTION  OF 

TIME  IN 

USE 

TERMINAL 

( 1) 

4000 

0. 

2000 

TERMINAL 

( 2) 

4000 

0. 

1750 

NAME  OF 

STORE 

TIME 

CAPCTY 

MAX 

USD 

TOTAL  OCCP 

AVG  UTL 

STORAGE 

( 1) 

4000 

50 

40 

10000 

0.0500 

STORAGE 

( 2) 

4000 

50 

40 

23100 

0.1155 

NAME  OF 

TRUNK 

TIME 

CAPCTY 

MAX 

USD 

TOTAL  OCCP 

AVG  UTL 

BUFFER 

< 1) 

4000 

50 

50 

21550 

0. 1078 

BUFFER 

( 2) 

4000 

50 

50 

21000 

0.1050 
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VII.  THE  TRANSLATOR 


The  first  step  Is  the  execution  of  the  SOL  translator 
SOLTRAN.  This  program  converts  the  model  source  code  to  PL/1 
statements  and  places  the  translated  code  Into  an 
Intermediate  dataset. 

The  user  may  specify  a number  of  options  which  must  be 
contained  within  a comment: 

/*  SNUMOC,  STRACE , SLIST  */ 

SNUMOC  will  cause  the  translator  to  number  the  output. 

STRACE  will  Instruct  the  translator  to  generate  trace 
statements. 

HIST  will  cause  each  Input  line  to  be  printed. 

A description  for  the  use  of  the  SNUMOC  and  STRACE 
options  is  contained  In  chapter  V.  The  SLIST  option  simply 
lists  all  Input  card  Images  In  addition  to  the  lines 
which  contain  errors  and  would  be  printed  automatically. 

The  SOLTRAN  program  requires  the  following  file  and 
dataset  allocations: 
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VIII.  THE  COMPILER/LINK-EDITOR 

The  compi 1 e/1 1 nk-edi t step  uses  the  regular  IBM 
procedures  and  follows  the  Instructions  provided  in  the 
corresponding  IBM  User  Guide.  The  SOL-370  system  is 
compatible  with  the  PL/l-F  compiler,  the 

PL/l-Optlmizing  compiler,  and  the  PL/1 -Checkout 
compil er . 

The  compile  step  requires  the  following  file  and 
dataset  allocations: 


FILE  DEFAULT  DATASET  DATASET  DESCRIPTION 


SYSPRINT 

SOLINC 

SYSIN 

SYSLIN 


sysout^Ta.uT 

SYS2.S0LLIB 
SOL.PLI (X  ) 
SOL .OBJ ( X ) 


Compiler  listing  on  printer 
SOL-370  library  on  disk 
PL/1  input  dataset  on  disk 
Object  module,  if  requested 


The  Link-Edit  step  requires  the  following  file  and  dataset 
allocations: 


FILE  DEFAULT  DATASET  DATASET  DESCRIPTION 

5ysprTnT~~SYSOUT=Ta7uT  L Tn  k - edT  t~TT  sRn  g~o  n~p  rT  n te  r 

SYSLMOD  SOL.LOAD(X)  Load  module  on  disk 


Y“ 
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IX 


MODEL  EXECUTION 


Once  the  model  has  been  compiled.  It  can  be  executed 
numerous  times  with  different  Input  parameters.  If 
breakout/restarts  are  programmed  for,  the  model  can  be 
restarted  at  any  one  of  the  checkpoints.  The  value  for  the 
restart  point  Is  passed  to  the  program  via  the  PARM 
parameter  of  the  GO  step.  However,  before  a program  can  be 
restarted  some  datasets  must  be  renamed  as  follows  (where  X 
Is  the  name  of  the  model): 

In  case  no  restarts  of  this  model  have  been  executed: 

SOL.RESTART(X)  to  SOL . RESTART( X#  ) 

SOL . LOG (X ) to  SOL . LOG (X#  ) 

In  case  one  previous  restart  has  been  executed  and  the 
results  are  to  be  saved: 


SOL. RESTARTS#) 

to 

SOL .RESTART (XI) 

SOL . LOG ( X# ) 

to 

SOL . LOG (X 1 ) 

SOL .RESTART (X ) 

to 

SOL.RESTART(Xf) 

SOL . LOG ( X ) 

to 

SOL.LOG(X#) 

The  following  file  and  dateset  allocations  are  required 
for  the  Execution  step: 

FILE  DEFAULT  DATASET  DATASET  DESCRIPTION 


SYSPRINT  SYSOUT^TA.UI 

SYS  I N 

NAMEFIL  SOL . NAMES ( X ) 

$L0GF  SOL .LOG ( X ) 

CARD  SOL.DATA(GOIN) 

PRINTER  SYSOUT  = ( A ,U  ) 

DISK  SYSOUT  = ( A , U ) 

SBRKOUT  SOL .RESTART ( X ) 

SBRKFIL  SOL.RESTART(X#) 
SOLDLOG  SOL . LOG ( X#  ) 

l § 


Default  printer  output 
Temporary  workflle 
Simulation  names  file 
Simulation  log  file 
Simulation  parameter  input 
Printer  output 
Printer  Output  for  traces 
Output  file  at  checkpoint 
Input  file  at  restart 
Input  log  file  at  restart 


X.  THE  STATISTICS  PROGRAM 


During  the  execution  of  the  STAT  step  of  the 
simulation,  the  Statistics  Program  SOLSTAT  Is  Invoked.  This 
program  has  been  designed  as  an  Interactive  program  for  use 
In  the  time  shared  environment.  When  using  this  program  In 
the  batch  environment,  proper  Input  data  must  be  prepared 
equivalent  to  the  action  a TSO  user  would  have  to  take. 

The  first  record  read  by  SOLSTAT  specifies  whether  the 
tables  specified  in  the  source  code  are  to  be  redimensioned 
or  not.  The  input  should  be  either  YES  or  NO.  If  the 
response  is  YES  then  the  program  prompts  the  user  for  new 
dimensions  for  all  tables.  It  expects  to  find  for  each 
table  three  values:  the  lower  limit,  the  Increment,  and  the 
upper  limit.  That  is,  if  the  source  code  had  specified 
three  tables  and  the  user  wants  to  rediinension  only  one,  he 
must  enter  three  values  for  each  of  the  three  tables  as 
fol 1 ows : 

YES 

0,100,1000, 

10000,10,10200, 

0,10000,100000, 

The  input  is  in  card  image  format  and  data  entries  may 
start  in  any  column.  A character  string  must  not  be 
followed  by  a comma;  numbers  may  be  separated  by  commas  or 
blanks.  If  no  tables  are  specified  the  user  should  specify 
NO.  The  system  will  then  read  the  next  record  which 
specifies  the  initial  number  of  time  units  that  are  to  be 
thrown  out  for  this  analysis.  A blank  record  or  a comma 
will  Invoke  the  default  value  zero.  This  feature  is 
Important  whenever  the  user  wants  to  suppress  startup 
effects  of  a simulation. 

The  next  record  read  specifies  whether  the  PLOT  routine 
Is  to  be  Invoked.  This  routine  Is  invoked  if  the  user 
desires  a graphical  distribution  of  maximum  loads  which  have 
occured  on  STORES  or  TRUNKS  with  dimensions  larger  than  one. 
The  plot  function  will  produce  a vertical  bar  chart,  each 
bar  helgth  corresponding  to  the  number  of  entries  for  a 
specific  load  class.  These  bar  graphs  are  not  too  often 
used  but  are  helpful  in  Illustrating  loao  distributions  on 
Store  and  Trunk  arrays. 

If  the  record  read  contained  a YES  then  the  program 
will  Interpret  the  dual  number  record  on  the  next  card  as 
the  type  of  resource  to  be  plotted  ( 1 for  store  and  3 for 
trunk)  and  the  sequence  number  within  each  type  ( numbered 
in  order  of  appearance  in  the  trunk  or  store  declaration). 


Y" 
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The  next  two  records  contain  scaling  factors  for  the 
plot.  The  first  record  contains  the  vertical  scaling 
factors  (lower  Unit,  Increment,  upper  limit).  The  second 
record  contains  the  horizontal  scaling  factors  (lower  limit. 
Increment,  and  upper  limit  of  capacity).  The  plot 
specification  for  a store  declared  as  100  L INK ( 50 ) may  look 
as  follows: 


1.1. 

1.1.10, 

0,10,100, 

The  resulting  bar  graph  will  then  look  as  follows: 
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The  next  record  contains  either  a YES  or  NO  and 
specifies  whether  more  stores  or  trunks  are  to  be  plotted. 
If  the  record  contains  a YES,  two  more  records  with  scaling 
specifications  for  the  next  plot  will  be  read,  etc.  If  the 
record  contains  a NO,  the  program  will  Interpret  the  next 
record  as  a specification  for  snapshot  statistics.  If  the 
record  contains  a NO,  only  one  statistics  listing  for  the 
time  the  simulation  terminated  Is  produced.  If  the  record 
contains  a YES,  then  subsequent  records  are  read,  each 
containing  the  specific  value  of  the  simulation  time  for 
which  the  statistics  snapshot  Is  to  be  produced  for.  The 
program  will  stop  when  1c  either  finds  a specification  for  a 
snapshot  outside  the  simulation  run  or  when  there  are  no 
more  records. 

The  SOLSTAT  program  requires  the  following  file  and 
dataset  allocations: 

FILE  DEFAULT  DATASET  DATASET  DESCRIPTION 

LOG  s3l7l<5£(T7  5TmuTatTorTTog~TTTi 

NAMME  SOL . NAMES ( X ) Simulation  names  file 

SYSIN  SOL.DATA(STATIN)  Statistics  parameter  Input 

SYSPRINT  SYSOUT • ( A ,U ) Printer  output  file 
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XI.  THE  PLOT  PROGRAM 


The  PLOT  program  Is  the  second  of  the  program  products 
available  for  post-simulation  analysis.  This  program 
provides  the  capability  to  plot  loads  on  stores  or  trunks  as 
a function  of  simulation  time.  Besides  the  regular  output  it 
also  generates  a special  print  dataset,  which  can  be  used  to 
print  formatted  plots  on  special  paper.  An  example  Is  given 
in  Figure  4.  The  program  was  developed  for  use  in  the  TSO 
environment  and  is  highly  interactive.  However  it  can  also 
be  run  in  the  batch  mode  either  using  the  built-in  defaults 
(empty  input  records)  or  by  preparing  the  input  data 
according  to  the  protocol  of  the  interactive  conversational 
mode.  To  do  this  the  following  protocol  is  provided: 

1.  Start  time  for  data  collection, 

2.  Type  of  resource  ( 1 for  store,  2 for  trunk), 

3.  Sequence  number  (in  order  of  declaration), 

4.  Subscript  (only  if  resource  is  dimensioned), 

5.  YES  (to  override  declared  capacity  values), 

HO  (to  bypass  step  6), 

6.  Override  capacities  (as  many  as  there  are  subscripts), 

7.  Time  origin  of  plot  (left  limit  of  window), 

8.  Time  increment  (70  horizontal  points/per  plot), 

9.  YES  (to  enter  plot  in  print  dataset), 

NO  (do  not  enter  plot  into  print  dataset), 

10.  YES  (to  re-scale  the  same  plot), 

NO  (no  re-scaling  wanted,  skip  step  11), 

11.  New  vertical  scaling  factor. 

Return  to  7, 

12.  YES  (to  plot  other  resources,  go  to  step  2), 

NO  (to  terminate  processing), 

13.  YES  (If  it  was  last  possible  resource  and  PLOT  is 

to  restart,  go  to  step  1), 

14.  NO  (to  terminate  processing). 

The  SOLPLOT  program  requires  the  following  file  and 
dataset  allocations 


FILE 


DEFAULT  OATASET 


DATASET  DESCRIPTION 


LOG" 
NAMME 
CRD 
OUT  1 

SYSPRINT 

OUT 


"sol.logTxT" 

SOL  . NAMES ( X ) 

SOL . DATA( PLOT  I N ) 
X.DATA 
X.OUTLIST 
SYSOUT  = ( A , U ) 


"Simulation  log  fTTe~ 
Simulation  names  file 
Plot  parameter  file 
Plot  print  file 
Dummy  print  file 
Printer  output  file 


The  following  JCL  listing  Is  an  example  of  executing 
the  SOLPLOT  program  In  the  batch  environment.  Figure  3 has 
been  generated  by  this  run. 
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/ /R1591P0  JOB  (D044,R830,440,15,180,,),ULFERS, 

//  MSGLEVEL- (1 , 1 ) .N0TIFY-R1591 .MSGCLASS-Q 

//PLOT  EXEC  PGM-TS0PL0T.REGI0N-180K, TIME-4, 

//  PARM-'  1 

//STEPLIB  DD  DSN-UR1591. LOAD, DISP-(SHR, KEEP) 

//SYSPRINT  DD  SYSOUT*(Y,U) 

//CRD  DD  * 

0 

3 

1 

YES 

50,50 

2000 

10 

NO 

YES 

5 

2000 

20 

YES 

NO 

END 

//LOG  DD  DSN-R1591 . SOL . LOG ( SOLTEST ) .OISP-SHR 
//NAMME  DD  DSN-R 1591. SOL. NAMES ( SOLTEST ),D I SP-SHR 
//OUT  DD  SYSOUT-(A.U) 

//0UT1  DO  0SN*R1591.$0LTEST.DATA,UNIT-SYSTS,5PACE*(1680,(1Q0,600) ), 
//  DCB- ( L RECL -80 , BLKS I ZE-1 680 , RECFM-FBA ) , D I SP- ( MOD ,CATLG ) 


BUFFER  (001) 

095-1 

090-1 

085-1 

080-1 

075-1 

070-1 

065-1 

060-1 

055-1 


050-1  **  , . . , . ****** 

045-1  ...... 

040-1  ****  . . . . . ** 

035-1  ...... 

030-1  . . . . . ** 

025-1  ...... 

020-1**  **************************  # ** 

015-1 

010-1  .....**. 

005-1  ...... 


000-*  *********************  * 
0002000  0002200  0u02400  0002600  0002800  0003000  ~006320o 

Figure  3.  Exempt  . :,.0T  Routine  Output 
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